Year 60 - Understaffed Sorting

-- 7 Billion Humans (2214M) --
-- 60: Understaffed Sorting by @commonnickname --

jump a
mem1 = foreachdir e:
	a:
	if mem1 == worker:
		step w
	else:
		step e
	endif
	jump b
endfor
c:
d:
e:
step nw
step nw
f:
jump g
mem1 = foreachdir w:
	g:
	if mem1 != wall:
		step w
		step w
		jump f
	endif
endfor
step s
step e
step se
b:
h:
i:
j:
k:
l:
m:
n:
jump o
mem1 = foreachdir e:
	mem4 = foreachdir se:
		mem3 = foreachdir s:
			mem2 = foreachdir sw:
				o:
				if mem1 == worker or
				 mem1 == datacube:
					jump n
				endif
				jump p
			endfor
		endfor
	endfor
endfor
p:
if mem2 != datacube and
 mem2 != wall or
 mem3 != datacube:
	jump c
endif
if mem4 == wall:
	if mem2 > mem3:
		pickup sw
		drop
		step sw
		pickup e
		drop
		step e
		pickup n
		drop
		step nw
	endif
	jump d
endif
if mem4 != datacube and
 mem4 != wall:
	jump e
endif
if mem2 <= mem3 and
 mem3 <= mem4:
	step e
	step e
	jump m
endif
if mem2 <= mem4 and
 mem4 < mem3:
	pickup s
	drop
	step s
	pickup e
	drop
	pickup n
	step e
	drop
	step ne
	jump l
endif
if mem3 < mem2 and
 mem2 <= mem4:
	pickup sw
	drop
	step sw
	pickup e
	drop
	step e
	pickup n
	drop
	step ne
	step e
	jump k
endif
if mem4 < mem3 and
 mem3 <= mem2:
	jump q
endif
if mem4 <= mem3 and
 mem3 < mem2:
	q:
	pickup sw
	drop
	pickup se
	step sw
	drop
	step e
	step e
	pickup nw
	drop
	step ne
	jump j
endif
if mem3 < mem4 and
 mem4 < mem2:
	pickup sw
	drop
	step sw
	pickup e
	drop
	step e
	pickup e
	drop
	step e
	pickup nw
	drop
	step ne
	jump i
endif
if mem4 < mem2 and
 mem2 < mem3:
	pickup s
	drop
	step s
	pickup w
	drop
	pickup e
	step w
	drop
	step e
	step e
	pickup nw
	drop
	step ne
	jump h
endif